home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 1
/
Cream of the Crop 1.iso
/
UTILITY
/
DO1002.ARJ
/
TUTORIAL.SCR
< prev
next >
Wrap
Text File
|
1991-12-31
|
4KB
|
273 lines
* ----------------- A DO script tutorial ------------------------------
.wi full clr
* Reset EDIT and LIST variables incase DO.CFG exists
/SET HoldEdit %Edit
/SET EDIT ""
/SET HoldList %List
/SET LIST ""
/STOP EOF
/CANCEL ALL
/SET t "c 14 1"
/IF %Tutorial01 NE "" GetLabel
/SET Label %Tutorial01
/GOTO %Label NOTFOUND
:GetLabel
.clr
Enter a command or section at which to start the tutorial.
Press »bo«<enter>»#« to take the complete tutorial.
/BOX 1 1 80 6 14 11 " DO Tutorial "
/SET Default ""
/GETS Label Default "Start at?" "" UC
/IF %Label NE "" TOP
/GOTO %Label NOTFOUND
:TOP
/PAGEPROMPT
.clr go 1 20 gray
┌───────────────────────────────────────────────────────────────────────────┐
│ │
└───────────────────────────────────────────────────────────────────────────┘
/VERSION
.go 8 7 cy
T H E
.cy go 57 13
tutorial
.pa 1 re
/DRAW V 16 7 11 50 ▓
/DRAW H 7 16 21 50 ▓
/DRAW V 22 8 10 50 ▓
/DRAW H 11 21 16 50 ▓
/DRAW V 24 7 11 50 ▓
/DRAW H 11 24 30 50 ▓
/DRAW V 30 11 7 50 ▓
/DRAW H 7 30 24 50 ▓
.ye
/WALK R 11 34 'S C R I P T P R O C E S S O R' 100
.pa 1 ye
/WALK L 21 75 'Copyright BOBsWARE, Sacramento, CA 1989, 1990, 1991, 1992' 100
:INTRODUCTION
/INTRO
:INSTALLING
/INSTALL
:LICENSE
/LICENSE
:SCRIPTS
/SCRIPTS
:VARIABLES
/VARIABLE
:SPECIAL
/SPECIAL
:LABELS
/LABELS
:COMMENTS
/COMMENTS
:FUNCTIONS
:STRINGS
/STRINGS
:DATES
/DATES
:OTHER
/FUNCTION.SCR
:COMMANDS
/COMMANDS
:/ASK
/ASK.SCR
:/SET
/SET.SCR
:/CAL
/CAL.SCR
:/BIG
/BIG.SCR
:/CANCEL
:/BOX
/BOX.SCR
:/CANCEL
/CANCEL.SCR
:/CD
/CD.SCR
:/CHAIN
/CHAIN.SCR
:CHAIN2
You have now returned to the Tutorial Script.
/BOX 2 1 52 3 14 15 " Tutorial Script "
:/CLEAR
/CLEAR.SCR
:/CLOCK
/CLOCK.SCR
:/DOCUMENT
/DOCUMENT.SCR
:/DIR
/DIR.SCR
:FILES
/FILES.SCR
:/OPEN
/OPEN.SCR
:/CLOSE
/CLOSE.SCR
:/WRITE
/WRITE.SCR
:/READ
/READ.SCR
:/DEBUG
/DEBUG.SCR
:/IF
/IF.SCR
:/DISPLAY
/DISPLAY.SCR
:!
/DOIT
:/DRAW
/DRAW.SCR
:/EDIT
/EDIT.SCR
:/ERASE
/ERASE.SCR
:/EXEC
/EXEC.SCR
:/EXIT
/EXIT.SCR
:/FRAME
/BOXFRAME.SCR
:/GETC
/GETC.SCR
:/GD
/GD.SCR
:/GETS
/GETS.SCR
:/GOTOC
/GOTOC.SCR
:/GOTO
/GOTO.SCR
:/GOSUB
/GOSUB.SCR
:/HALT
/HALT.SCR
:/EXIST
/EXIST.SCR
:/INTERACTIVE
/INTERACT.SCR
:/LIST
/LIST.SCR
:MACROS
:/MACROS
/MACROS.SCR
:/MD
/MD.SCR
:/MATH
/MATH.SCR
:/PASSWORD
/PASSWORD.SCR
:/PAUSE
/PAUSE.SCR
:/PRINT
/PRINT.SCR
:/RENAME
/RENAME.SCR
:/REPEAT
/REPEAT.SCR
:/INKEY
/INKEY.SCR
:/RETURN
/RETURN.SCR
:/RETURNCODE
/RETURNCD.SCR
:/INC
:/DEC
/INCDEC.SCR
:/PAGE
/PAGE.SCR
:/PAGEPROMPT
/PGPROMPT.SCR
:/PARSE
/PARSE.SCR
:/RD
/RD.SCR
:/STOP
/STOP.SCR
/CANCEL ALL
.clr
You have been returned to the »ye«TUTORIAL»#« script to continue
your tutorial. We have reset the »%t«/CANCEL»#« command to »wh«cancel all
scripts»#« from this point.
:/SUBST
/SUBST.SCR
:/VERSION
/VERSION.SCR
:/WALK
/WALK.SCR
:COMM
/COMMFUNC
:/INITCOM
/INITCOM.SCR
:/TERM
/TERM.SCR
:/CLOSECOM
/CLOSECOM.SCR
:/SEND
/SEND.SCR
:/DIAL
/DIAL.SCR
:/SETCOMDELAY
/SETDELAY.SCR
:/SETWAIT
/SETWAIT.SCR
:/DELWAIT
/DELWAIT.SCR
:/CWAIT
/CWAIT.SCR
:/LOOK
/LOOKAT.SCR
:/FLUSHCOM
/FLUSHCOM.SCR
:END
.pg wi full clr wi 10 7 79 24 wh
/VERSION
This is the end of the »%t«DO»ye« Tutorial»wh«. For additional
information and practice, you might want to examine
this script, the sample scripts, and create scripts
of your own.
/BOX 8 6 65 13 12 14 " Thank You "
.pg -24 wi full clr
/GOTO EOF
:NotWritten
.pg wi full c 0 7 clr go 1 10
»c 4 7«%Section»c 0 7« has not been written yet»+c 4 7«!»c 0 7«
.pg -24 #
/RETURN
:NOTFOUND
.clr bell
»wh«The label »bo«%Label»wh« was not found.»#«
/box 1 1 80 5 14 7 " E R R O R ! "
Press »bo«<enter>»#« to start at the top of the script or
»bo«<esc>»#« to terminate tutorial.
/PAGEPROMPT "Press <enter> to continue <esc> to abort . . ."
/PAGE
/PAGEPROMPT
:NOLABEL
/GOTO TOP
:EOF
.wi full clr
/SET LIST %HoldList
/SET EDIT %HoldEdit
* Clear variable memory
/ENDEXEC CLEAR
* -------------- End of Tutorial Script ----------------